// TOWN SPECIAL ENCOUNTERS
//    Town 88: Spiral Crypt

beginzonescript;

variables;

short im_hostile = 0;
short max_crime = 200;
short last_abil;
short counter = 0;
short set_ter1 = 0;
short set_ter2 = 0;

body;

beginstate INIT_STATE;
	last_abil = get_current_tick();

	sf(88,15,0);
	sf(88,16,0);
	sf(88,17,0);
	sf(88,18,0);
	sf(88,19,1);
	
	if (gf(88,11) > 0)
		erase_char(8803);
		
//	set_name(,);
//	add_range_to_group(,,groupn);

	set_personality_name(1760,"Big Ghast");

	set_level(30001,10);
	set_level(30002,12);
	
	set_crime_tolerance(max_crime);

	break;

beginstate EXIT_STATE;
break;

beginstate START_STATE;
	if ((set_ter1 == 0) && (gf(88,6) > 0)) {
		set_ter1 = 1;
		set_terrain(0,20,26,0);
		}
	if ((set_ter2 == 0) && (gf(88,7) > 0)) {
		set_ter2 = 1;
		set_terrain(0,37,20,0);
		}
	
	if ((gf(88,15) == 0) && (party_within_dist(15,40,5))) {
		print_str_color("You hear the grinding of steel on steel.",2);
		print_str_color("Some of the gates close. Others open.",2);
		play_sound(28);
		sf(88,15,1);
		sf(88,18,0);
		if (gf(88,12) == 0)
			sf(88,19,0);
			
		if (gf(88,13) == 0) {
			sf(88,13,1);
			ok_dlog(25,1);
			}
		}
	if ((gf(88,16) == 0) && (party_within_dist(43,48,5))) {
		print_str_color("You hear the grinding of steel on steel.",2);
		print_str_color("Some of the gates close. Others open.",2);
		sf(88,15,0);
		sf(88,16,1);
		play_sound(28);
		}
	if ((gf(88,17) == 0) && (party_within_dist(48,22,5))) {
		print_str_color("You hear the grinding of steel on steel.",2);
		print_str_color("Some of the gates close. Others open.",2);
		sf(88,16,0);
		sf(88,17,1);
		play_sound(28);
		if (gf(88,14) == 0) {
			sf(88,14,1);
			ok_dlog(27,1);
			}
		}
	if ((gf(88,18) == 0) && (party_within_dist(23,14,5))) {
		print_str_color("You hear the grinding of steel on steel.",2);
		print_str_color("Some of the gates close. Others open.",2);
		sf(88,17,0);
		sf(88,18,1);
		play_sound(28);
		}
			
break;

beginstate 10;
break;

beginstate 11;
break;

beginstate 12;
break;

beginstate 13;
break;

beginstate 14;
break;

//	print_str("");
//	set_terrain_string_range("",1);
//	set_terrain_string_range("The sign says - .",1);

